function gcpick_printinfo(option, data, config, status)
disp(['Station:',data.station]);
P = {'-','0','+'};
if contains('all', option)
    option = {'tp', 'ts', 'polar'};
end
if contains('tp', option)
    fprintf('\tTp:%.2f\n',data.tp);
end
if contains('ts', option)
    fprintf('\tTs:%.2f\n',data.ts);
end
if contains('polar', option)
    fprintf('\tPolar:%s, %s, %s\n',P{data.polar.E+2}, ...
        P{data.polar.N+2}, P{data.polar.Z+2});
end
if contains('path', option)
    disp(config.datapath)
end